(readevalloop): Fix type of UNIBYTE parameter.

diff --git a/src/lread.c b/src/lread.c
index 14385d3188e75471b0f818fee201e2dd0ded9dbf..f3b9948e1492dd73a346dcf41a6ca3f10c74ab5a 100644 (file)
--- a/src/lread.c
+++ b/src/lread.c
@@ -936,7 +936,7 @@ readevalloop (readcharfun, stream, sourcename, evalfun, printflag, unibyte)
      Lisp_Object sourcename;
      Lisp_Object (*evalfun) ();
      int printflag;
-     int unibyte;
+     Lisp_Object unibyte;
 {
   register int c;
   register Lisp_Object val;